home *** CD-ROM | disk | FTP | other *** search
/ EuroCD 3 / EuroCD 3.iso / Programming / PPCbwb111 / source / bwb_mes.h < prev    next >
Encoding:
C/C++ Source or Header  |  1998-06-24  |  14.0 KB  |  285 lines
  1. /***************************************************************
  2.  
  3.         bwb_mes.h       Header File for Natural-Language-Specific
  4.                         Text Messages for Bywater BASIC Interpreter
  5.  
  6.                         Copyright (c) 1992, Ted A. Campbell
  7.  
  8.                         Bywater Software
  9.                         P. O. Box 4023
  10.                         Duke Station
  11.                         Durham, NC  27706
  12.  
  13.                         email: tcamp@acpub.duke.edu
  14.  
  15.         Copyright and Permissions Information:
  16.  
  17.         All U.S. and international copyrights are claimed by the
  18.         author. The author grants permission to use this code
  19.         and software based on it under the following conditions:
  20.         (a) in general, the code and software based upon it may be
  21.         used by individuals and by non-profit organizations; (b) it
  22.         may also be utilized by governmental agencies in any country,
  23.         with the exception of military agencies; (c) the code and/or
  24.         software based upon it may not be sold for a profit without
  25.         an explicit and specific permission from the author, except
  26.         that a minimal fee may be charged for media on which it is
  27.         copied, and for copying and handling; (d) the code must be
  28.         distributed in the form in which it has been released by the
  29.         author; and (e) the code and software based upon it may not
  30.         be used for illegal activities.
  31.  
  32. ***************************************************************/
  33.  
  34.  
  35. #ifndef TRUE
  36. #define TRUE    1
  37. #define FALSE   0
  38. #endif
  39.  
  40. /* Define only one of the following as TRUE: if none is defined,
  41.    standard ENGLISH will be taken as the default */
  42.  
  43. #define ENGLISH         TRUE        /* standard English */
  44. #define POL_ENGLISH     FALSE        /* polite English messages */
  45. #define IMP_ENGLISH    FALSE        /* impolite English messages */
  46. #define LATIN        FALSE        /* Latin language messages */
  47. #define STD_RUSSIAN    FALSE        /* Russian language messages */
  48.  
  49. /****************************************************************
  50.  
  51.     The following Latin conventions are used:
  52.  
  53.     LATIN            ENGLISH
  54.  
  55.     acies datorum        array (of data)
  56.         crusta            shell
  57.     litteras        (character) string
  58.     memoria mutabilis    RAM
  59.     organum            device
  60.     ordo            line
  61.     praeceptum        command
  62.       praecepta          program (commands)
  63.       praecepta interna      operating system
  64.       praeceptellum          function
  65.     tabula            file
  66.  
  67. ****************************************************************/
  68.  
  69. #if LATIN
  70. #define MES_SIGNON      "Interpres <Super Flumina> ad linguam BASIC, versionis"
  71. #define MES_COPYRIGHT   "Iure proprio scriptoris (c) 1992, Eduardi de Campobello"
  72. #define MES_LANGUAGE    "Cum nuntiis latinis ab ipso E. de C."
  73. #define PROMPT          "bwBASIC:"
  74. #define ERROR_HEADER    "ERRANT praecepta in ordine"
  75. #define ERRD_HEADER     "ERRANT praecepta"
  76. #define MATHERR_HEADER  "ERRANT praecepta"
  77. #define MES_BREAK       "Intermittuntur praecepta in ordine"
  78. #define ERR_OPENFILE    "Non patet tabula quod <%s> vocatur"
  79. #define ERR_GETMEM      "Deest memoria mutabilis"
  80. #define ERR_LINENO      "Non adicitur novus ordo praeceptorum"
  81. #define ERR_LNNOTFOUND  "Non invenitur ordo praeceptorum <%d>"
  82. #define ERR_LOADNOFN    "LOAD requirit nomen ad tabulam"
  83. #define ERR_NOLN        "Non invenitur ordo praeceptorum"
  84. #define ERR_NOFN        "Non invenitur nomen ad tabulam"
  85. #define ERR_RETNOGOSUB  "RETURN sine GOSUB"
  86. #define ERR_INCOMPLETE  "Praeceptum imcompletum"
  87. #define ERR_ONNOGOTO    "ON sine GOTO sive GOSUB"
  88. #define ERR_VALOORANGE  "Numerus in praeceptis excedit fines"
  89. #define ERR_SYNTAX      "Non sequunter praecepta"
  90. #define ERR_DEVNUM      "Numerus ad organum invalidum est"
  91. #define ERR_DEV         "Errat organum"
  92. #define ERR_OPSYS    "Errant praecepta interna"
  93. #define ERR_ARGSTR    "Praeceptum requirit litteras"
  94. #define ERR_DEFCHAR    "ad varium definiendum"
  95. #define ERR_MISMATCH    "Non congruunt typus"
  96. #define ERR_DIMNOTARRAY    "Praeceptum requirit nomen ad aciem datorum"
  97. #define ERR_OD        "Desunt data"
  98. #define ERR_OVERFLOW    "Data excedunt fines"
  99. #define ERR_NF        "NEXT sine FOR"
  100. #define ERR_UF        "Non definitur praeceptellum"
  101. #define ERR_DBZ        "Non licet divisio ab nihilo"
  102. #define ERR_REDIM    "Non licet varium iterum definiendum"
  103. #define ERR_OBDIM    "Debet OPTION BASE procedere DIM"
  104. #define ERR_UC        "Praeceptum incognitum est"
  105. #endif
  106.  
  107. #if POL_ENGLISH
  108. #define MES_SIGNON      "Bywater BASIC Interpreter/Shell, version"
  109. #define MES_COPYRIGHT   "Copyright (c) 1992, Ted A. Campbell"
  110. #define MES_LANGUAGE    "Polite English messages courtesy of t.a.c."
  111. #define PROMPT          "How may we help you?"
  112. #define ERROR_HEADER    "Very sorry. There is a problem in line"
  113. #define ERRD_HEADER     "Very sorry. There is a problem"
  114. #define MATHERR_HEADER  "We have a small problem"
  115. #define MES_BREAK       "At your request, the program has been interrupted at line"
  116. #define ERR_OPENFILE    "I'm afraid we have failed \nto open file %s."
  117. #define ERR_GETMEM      "I'm afraid we have failed \nto find sufficient memory."
  118. #define ERR_LINENO      "I'm afraid we have failed \nto link line number."
  119. #define ERR_LNNOTFOUND  "I'm afraid that we \ncannot find line number %d."
  120. #define ERR_LOADNOFN    "Could you perhaps specify \nwhich file you wish to be loaded?"
  121. #define ERR_NOLN        "It would help greatly \nif there were a line number here."
  122. #define ERR_NOFN        "It would help greatly \nif there were a file name here."
  123. #define ERR_RETNOGOSUB  "Is it possible \nthat there is a RETURN without a GOSUB here?"
  124. #define ERR_INCOMPLETE  "I'm afraid that the statement\nappears to be incomplete."
  125. #define ERR_ONNOGOTO    "It appears that there is an ON \nwithout a corresponding GOTO or GOSUB statement."
  126. #define ERR_VALOORANGE  "A value given here \nseems to be out of range."
  127. #define ERR_SYNTAX      "Could it be \nthat there is a syntax error at this point?"
  128. #define ERR_DEVNUM      "The device or file \nnumber here does not seem to be correct."
  129. #define ERR_DEV         "There appears \nto have been an error addressing the file or device \nwhich you requested."
  130. #define ERR_OPSYS    "A most unfortunate error \nseems to have been generated by the computer's operating system."
  131. #define ERR_ARGSTR    "Could you perhaps \nsupply a string argument at this point?"
  132. #define ERR_DEFCHAR    "The variable definition \nat this point appears to have an improper argument."
  133. #define ERR_MISMATCH    "It would appear \nthat something in this statement is rather seriously mismatched."
  134. #define ERR_DIMNOTARRAY    "Could you perhaps \nsupply an array name for the argument at this point?"
  135. #define ERR_OD        "Oh dear, we seem to have no more data to read now."
  136. #define ERR_OVERFLOW    "Subhuman devices \ndo have their limits, and we're afraid that at this point \nthe limits of Bywater BASIC have been exceeded."
  137. #define ERR_NF        "There seems to be \na NEXT statement without a corresponding FOR statement. Could you check on it?"
  138. #define ERR_UF        "It would appear \nthat the function named at this point has not been defined."
  139. #define ERR_DBZ        "Unfortunately, \ndivision by zero can cause dreadful problems in a computer."
  140. #define ERR_REDIM    "We're very sorry \nto say that a variable such as this cannot be redimensioned."
  141. #define ERR_OBDIM    "It would be ever so helpful \nif the OPTION BASE statement were to be called prior to the DIM statement."
  142. #define ERR_UC        "I'm afraid that \nwe are unable to recognize the command you have given here."
  143. #endif
  144.  
  145. #if IMP_ENGLISH
  146. #define MES_SIGNON      "Bywater BASIC Interpreter/Shell, version"
  147. #define MES_COPYRIGHT   "Watch it: Copyright (c) 1992, Ted A. Campbell"
  148. #define MES_LANGUAGE    "Impolite English messages courtesy of Oscar the Grouch"
  149. #define PROMPT          "(*sigh) What now?"
  150. #define ERROR_HEADER    "YOU SCREWED UP at line"
  151. #define ERRD_HEADER     "YOU SCREWED UP"
  152. #define MATHERR_HEADER  "ANOTHER SCREWUP!"
  153. #define MES_BREAK       "Only a geek like you would interrupt this program at line"
  154. #define ERR_OPENFILE    "Ha ha! I can't open file %s. Too bad, sucker."
  155. #define ERR_GETMEM      "There isn't near enough memory \nfor this lunacy."
  156. #define ERR_LINENO      "You jerk: \nyou entered a non-existent line number."
  157. #define ERR_LNNOTFOUND  "You total idiot.  \nLine number %d isn't there. HA!"
  158. #define ERR_LOADNOFN    "Get out of here. \nNo way to load that file."
  159. #define ERR_NOLN        "Dumb bozo: you need to put \na LINE NUMBER here. Hint: Can you count?"
  160. #define ERR_NOFN        "Nerd of the year. \nYou forgot to enter a file name. \nWhy don't you learn BASIC and come back in a year?"
  161. #define ERR_RETNOGOSUB  "Oh come on, total amateur. \nYou've got a RETURN without a GOSUB"
  162. #define ERR_INCOMPLETE  "Dimwit. Why don't you \ncomplete the statement here for a change."
  163. #define ERR_ONNOGOTO    "You failed again: \nON without a GOTO or GOSUB."
  164. #define ERR_VALOORANGE  "Go home, beginner. \nThe value here is way out of range."
  165. #define ERR_SYNTAX      "Sure sign of a fourth-rate programmer: \nThis makes no sense at all."
  166. #define ERR_DEVNUM      "Way to go, space cadet. \nThe device (or file) number here is totally in orbit."
  167. #define ERR_DEV         "HO! The file or device \n you requested says: DROP DEAD."
  168. #define ERR_OPSYS    "You obviously don't know \nwhat this computer can or can't do."
  169. #define ERR_ARGSTR    "Do you have big ears? \n(Like Dumbo?) You obviously need a string argument at this point."
  170. #define ERR_DEFCHAR    "Amazing. Surely children \nknow how to form a corrent argument here."
  171. #define ERR_MISMATCH    "No way, turkey. \nThe statement here is TOTALLY mismatched."
  172. #define ERR_DIMNOTARRAY    "Incredible. Why don't you \nsuppy an ARRAY NAME where the prograqm calls for an ARRAY NAME? (Or just go home.)"
  173. #define ERR_OD        "Have you ever studied BASIC before? \nYou've run out of data."
  174. #define ERR_OVERFLOW    "Congratulations on writing a program \nthat totally exceeds all limits."
  175. #define ERR_NF        "Go back to kindergarten: \nYou have a NEXT statement FOR."
  176. #define ERR_UF        "Trash. Total trash. \nDefine your stupid functions before calling them."
  177. #define ERR_DBZ        "Obviously, you'll never be a programmer. \nYou've tried division by zero here."
  178. #define ERR_REDIM    "You just don't understand: \nyou cannot redimension this variable."
  179. #define ERR_OBDIM    "Dork. You called OPTION BASE after DIM. \nLeave me alone."
  180. #define ERR_UC        "What do you think this is? \nTry entering a BASIC command here."
  181. #endif
  182.  
  183. #if STD_RUSSIAN
  184. #define MES_SIGNON      "éÎÔÅÒÐÒÅÔÁÔÏÒ Bywater BASIC, ×ÅÒÓÉÑ"
  185. #define MES_COPYRIGHT   "Copyright (c) 1992, Ted A. Campbell"
  186. #define MES_LANGUAGE    ""
  187. #define PROMPT          "çÏÔÏ×Ï"
  188. #define ERROR_HEADER    "ïûéâëá × ÓÔÒÏËÅ"
  189. #define MATHERR_HEADER  "ïûéâëá"
  190. #define MES_BREAK       "ðÒÏÇÒÁÍÍÁ ÐÒÅÒ×ÁÎÁ × ÓÔÒÏËÅ"
  191. #define ERR_OPENFILE    "îÅ ÍÏÇÕ ÏÔËÒÙÔØ ÆÁÊÌ %s"
  192. #define ERR_GETMEM      "íÁÌÏ ÐÁÍÑÔÉ"
  193. #define ERR_LINENO      "îÅ×ÅÒÎÙÊ ÎÏÍÅÒ ÓÔÒÏËÉ"
  194. #define ERR_LNNOTFOUND  "óÔÒÏËÁ %d ÎÅ ÎÁÊÄÅÎÁ"
  195. #define ERR_LOADNOFN    "LOAD: ÎÅ ÚÁÄÁÎÏ ÉÍÑ ÆÁÊÌÁ"
  196. #define ERR_NOLN        "ïÔÓÕÔÓÔ×ÕÅÔ ÎÏÍÅÒ ÓÔÒÏËÉ"
  197. #define ERR_NOFN        "ïÔÓÕÔÓÔ×ÕÅÔ ÉÍÑ ÆÁÊÌÁ"
  198. #define ERR_RETNOGOSUB  "RETURN ÂÅÚ GOSUB"
  199. #define ERR_INCOMPLETE  "îÅ×ÅÒÛÅÎÎÙÊ ÏÐÅÒÁÔÏÒ"
  200. #define ERR_ONNOGOTO    "ON ÂÅÚ GOTO ÉÌÉ GOSUB"
  201. #define ERR_VALOORANGE  "úÎÁÞÅÎÉÅ ×ÎÅ ÄÉÁÐÁÚÏÎÁ"
  202. #define ERR_SYNTAX      "óÉÎÔÁËÓÉÞÅÓËÁÑ ÏÛÉÂËÁ"
  203. #define ERR_DEVNUM      "îÅ×ÅÒÎÙÊ ÎÏÍÅÒ ÕÓÔÒÏÊÓÔ×Á"
  204. #define ERR_DEV         "ïÛÉÂËÁ ÕÓÔÒÏÊÓÔ×Á"
  205. #define ERR_OPSYS       "ïÛÉÂËÁ × ËÏÍÁÎÄÅ ÏÐÅÒÁÃÉÏÎÎÏÊ ÓÉÓÔÅÍÙ"
  206. #define ERR_ARGSTR      "áÒÇÕÍÅÎÔ ÄÏÌÖÅΠÂÙÔØ ÓÔÒÏËÏÊ"
  207. #define ERR_DEFCHAR     "îÅ×ÅÒÎÙÊ ÁÒÇÕÍÅÎÔ × ÏÐÒÅÄÅÌÅÎÉÉ ÐÅÒÅÍÅÎÎÏÊ"
  208. #define ERR_MISMATCH    "îÅÓÏÏÔ×ÅÔÓÔ×ÉÅ ÔÉÐÏ×"
  209. #define ERR_DIMNOTARRAY "áÒÇÕÍÅÎÔ ÎÅ ÉÍÑ ÍÁÓÓÉ×Á"
  210. #define ERR_OD          "îÅÔ ÄÁÎÎÙÈ"
  211. #define ERR_OVERFLOW    "ðÅÒÅÐÏÌÎÅÎÉÅ"
  212. #define ERR_NF          "NEXT ÂÅÚ FOR"
  213. #define ERR_UF          "îÅÏÐÒÅÄÅÌÅÎÎÁÑ ÆÕÎËÃÉÑ"
  214. #define ERR_DBZ         "äÅÌÅÎÉÅ ÎÁ ÎÏÌØ"
  215. #define ERR_REDIM       "îÅÌØÚÑ ÍÅÎÑÔØ ÒÁÚÍÅÒÎÏÓÔØ ÐÅÒÅÍÅÎÎÏÊ"
  216. #define ERR_OBDIM       "OPTION BASE ÄÏÌÖÎÁ ÂÙÔØ ×ÙÚ×ÁÎÁ ÄÏ DIM"
  217. #define ERR_UC          "îÅ×ÅÒÎÁÑ ËÏÍÁÎÄÁ"
  218. #endif
  219.  
  220. /* Standard English is taken as a default: if MES_SIGNON is not defined by
  221.    this time (i.e., by some other language definition), then
  222.    the following standard English definitions are utilized. */
  223.  
  224. #ifndef MES_SIGNON
  225. #define MES_SIGNON      "Bywater BASIC Interpreter/Shell, version"
  226. #define MES_COPYRIGHT   "Copyright (c) 1992, Ted A. Campbell"
  227. #define MES_LANGUAGE    " "
  228. #define PROMPT          "bwBASIC:"
  229. #define ERROR_HEADER    "ERROR in line"
  230. #define ERRD_HEADER     "ERROR"
  231. #define MATHERR_HEADER  "ERROR"
  232. #define MES_BREAK       "Program interrupted at line"
  233. #define ERR_OPENFILE    "Failed to open file %s"
  234. #define ERR_GETMEM      "Failed to find memory"
  235. #define ERR_LINENO      "Failed to link line number"
  236. #define ERR_LNNOTFOUND  "Line number %d not found"
  237. #define ERR_LOADNOFN    "LOAD: no filename specified"
  238. #define ERR_NOLN        "No line number"
  239. #define ERR_NOFN        "No file name"
  240. #define ERR_RETNOGOSUB  "RETURN without GOSUB"
  241. #define ERR_INCOMPLETE  "Incomplete statement"
  242. #define ERR_ONNOGOTO    "ON without GOTO or GOSUB"
  243. #define ERR_VALOORANGE  "Value is out of range"
  244. #define ERR_SYNTAX      "Syntax error"
  245. #define ERR_DEVNUM      "Invalid device number"
  246. #define ERR_DEV         "Device error"
  247. #define ERR_OPSYS    "Error in operating system command"
  248. #define ERR_ARGSTR    "Argument must be a string"
  249. #define ERR_DEFCHAR    "Incorrect argument for variable definition"
  250. #define ERR_MISMATCH    "Type mismatch"
  251. #define ERR_DIMNOTARRAY    "Argument is not an array name"
  252. #define ERR_OD        "Out of data"
  253. #define ERR_OVERFLOW    "Overflow"
  254. #define ERR_NF        "NEXT without FOR"
  255. #define ERR_UF        "Undefined function"
  256. #define ERR_DBZ        "Divide by zero"
  257. #define ERR_REDIM    "Variable cannot be redimensioned"
  258. #define ERR_OBDIM    "OPTION BASE must be called prior to DIM"
  259. #define ERR_UC        "Unknown command"
  260. #endif
  261.  
  262. extern char err_openfile[];
  263. extern char err_getmem[];
  264. extern char err_noln[];
  265. extern char err_nofn[];
  266. extern char err_lnnotfound[];
  267. extern char err_incomplete[];
  268. extern char err_valoorange[];
  269. extern char err_syntax[];
  270. extern char err_devnum[];
  271. extern char err_dev[];
  272. extern char err_opsys[]; 
  273. extern char err_argstr[];
  274. extern char err_defchar[];
  275. extern char err_mismatch[];
  276. extern char err_dimnotarray[];
  277. extern char err_od[];
  278. extern char err_overflow[];
  279. extern char err_nf[];
  280. extern char err_uf[];
  281. extern char err_dbz[];
  282. extern char err_redim[];
  283. extern char err_obdim[];
  284. extern char err_uc[];
  285.